www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\adminModel\D_admin_zhuantibiaoxmAdd_Chk.asp

    <%


'**************************************************************
' 新动软网站管理系统
' 官方网站: http://www.aspcpu.com
' 系统作者: 阮丁远(网名：天下程序)
' Copyright 新动软网站管理系统 版权所有
'**************************************************************


%>





<LINK href="../css.css" type=text/css rel=stylesheet>
<%

dir_set="../../"


%>


<!--#include file=../../inc/conn.asp-->
<!--#include file=../../inc/Functionb.asp-->

<!--#include file=../../inc/ajaxLIB.asp-->

<!--#include file=../inc/checkadmin2.asp-->

<!--#include file=../../inc/functionFiless.asp-->


<%


  biao=trim(request("biao"))

sname=request.Form("sname")




if sname="" then
	Response.Write("<script>alert(""请填写复选项名称"");history.go(-1);</script>")
else


set rs=server.CreateObject("adodb.recordset")
rs.open "select * from "&biao&"",conn,1,3



rs.addnew



rs("Specialname")=sname


rs.update
rs.close
set rs=nothing
call closeconn()
	Response.Write("<script language=javascript>alert(""添加成功"");location.href=""D_admin_models_zhuantibiao.asp?biao="&biao&""";</script>")



end if

%>